home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Language/OS - Multiplatform Resource Library
/
LANGUAGE OS.iso
/
lisp
/
kcl
/
kcl.lha
/
lsp
/
arraylib.data
< prev
next >
Wrap
Text File
|
1987-05-07
|
1KB
|
62 lines
#(
#!
(lisp::in-package 'user::lisp)
#!
(lisp::export '(lisp::make-array lisp::vector lisp::array-element-type lisp::array-rank lisp::array-dimension lisp::array-dimensions lisp::array-in-bounds-p lisp::array-row-major-index lisp::adjustable-array-p lisp::bit lisp::sbit lisp::bit-and lisp::bit-ior lisp::bit-xor lisp::bit-eqv lisp::bit-nand lisp::bit-nor lisp::bit-andc1 lisp::bit-andc2 lisp::bit-orc1 lisp::bit-orc2 lisp::bit-not lisp::array-has-fill-pointer-p lisp::fill-pointer lisp::vector-push lisp::vector-push-extend lisp::vector-pop lisp::adjust-array))
#!
(lisp::in-package 'lisp::system)
(lisp::optimize (lisp::safety 2) (lisp::space 3))
0
1
:initial-element
:element-type
:initial-contents
"The rank of the array is ~R,~%~
~7@Tbut ~R ~:*~[indices are~;index is~:;indices are~] ~
supplied."
7
6
9
14
8
4
2
13
11
12
:fill-pointer
"The fill pointer of the vector ~S zero."
:adjustable
lisp::proclaim
lisp::make-array
system::increment-cursor
system::sequence-cursor
lisp::vector
lisp::array-dimensions
lisp::array-in-bounds-p
lisp::array-row-major-index
lisp::bit
lisp::sbit
lisp::bit-and
lisp::bit-ior
lisp::bit-xor
lisp::bit-eqv
lisp::bit-nand
lisp::bit-nor
lisp::bit-andc1
lisp::bit-andc2
lisp::bit-orc1
lisp::bit-orc2
lisp::bit-not
lisp::vector-push
lisp::vector-push-extend
lisp::vector-pop
lisp::adjust-array
:displaced-to
:displaced-index-offset
:static
system::aset-by-cursor
system::bit-array-op
)